﻿Imports NHibernate
Imports NHibernate.Cfg
Imports NHibernate.Criterion
Namespace dal.dto.ubicacion
    Public Class localidad
        Private _id As Integer
        Private _departamento As departamento
        Private _nombre As String

        Public Overridable Property id As Integer
            Get
                Return _id
            End Get
            Set(ByVal value As Integer)
                _id = value
            End Set
        End Property

        Public Overridable Property departamento As departamento
            Get
                Return _departamento
            End Get
            Set(ByVal value As departamento)
                _departamento = value
            End Set
        End Property

        Public Overridable Property nombre As String
            Get
                Return _nombre
            End Get
            Set(ByVal value As String)
                _nombre = value
            End Set
        End Property

        Public Overridable ReadOnly Property nombreAMostrar As String
            Get
                Return _nombre & " (" & _departamento.nombre & ")"
            End Get
        End Property
    End Class
End Namespace

